home *** CD-ROM | disk | FTP | other *** search
- @Comment(-*-SCRIBE-*-)
- @Comment(SCRIBE Text Formatter Input for the UNIX Kermit User Guide)
-
- @Make<Manual>
- @Comment(Use /draft:F on command line to produce .LPT file w/cc in column 1)
-
- @case(device,postscript="@LibraryFile<Mathematics10>")
-
- @String<Ellips="...">
-
- @Style<Justification On, Hyphenation On, WidestBlank 1.4, Spacing 1,
- Spread 1, Indent 0, HyphenBreak Off, SingleSided>
- @Use<Hyphendic="kuser.hyp">
- @Modify<IndexEnv,Boxed,
- Columns 2,ColumnMargin 0.5inch,LineWidth 2.2inch,ColumnWidth 2.7inch>
-
- @Comment(Set desired spacing around various environments)
-
- @Modify<Quotation,Indentation 0, Above 1, Below 1, Spacing 1>
- @Modify<Example, Above 1, Below 1, Blanklines Hinge>
- @Modify<Verbatim, Leftmargin 0>
- @Modify<Itemize, Above 1, Below 1, Spacing 1, Spread 1>
- @Modify<Enumerate, Above 1, Below 1, Spacing 1, Spread 1>
- @Modify<Description, Above 1, Below 1, Spacing 1>
- @Define<MD,Use Display>
- @Define<Q,FaceCode R>
- @Define<QQ,FaceCode R,AfterEntry=["],BeforeExit=["]>
- @Define<SubH,Use Display,FaceCode R,Above 1.6,Below 1>
- @Define<SubU,Use UX,FaceCode R,Above 1.6,Below 1,need 6>
- @define<xx,use b>
- @define<yy,use i>
-
- @Comment(Printing Device Dependencies)
-
- @Case{Device,
- LPT="@use(Auxfile='vmslp.aux')
- @Case[Draft,F=`@Style(CarriageControl=FORTRAN)']
- @Style(linewidth 79)
- @Define<SubH,Use Display,FaceCode B,Above 1.6,Below 1>",
- Printronix="@use(AuxFile='vmspx.aux')
- @Case[Draft,F=`@Style(CarriageControl=fortran)']
- @Style(LineWidth 74, PaperLength 11 inches,BottomMargin 5 spacings)",
- PagedFile="@use(AuxFile='vmspf.aux')
- @Style(LineWidth 79, PaperLength 10.8 inches)
- @Style(TopMargin 3 spacings,BottomMargin 6 Spacings)
- @Modify(Example,Leftmargin +2)",
- Diablo="@Use(Auxfile='vmsdia.aux')
- @TypeWheel(Titan 10)
- @Define<SubH,Use Display,FaceCode B,Above 1.6,Below 1>",
- Postscript="@Use(Auxfile='vmsps.aux')
- @Style<Doublesided>
- @Style<Fontscale 10>
- @Define<MD,Use Mathdisplay>
- @String<Ellips='@Math(@Ldots)'>
- @Define<xx,use b,Size 12>
- @Define<yy,use i,Size 10>
- @Define<Q,FaceCode T>
- @Define(QQ,FaceCode T,AfterEntry=[@r<``>],BeforeExit=[@r<''>])
- @Define<SubH,Use Display,FaceCode B,Above 1.6,Below 1>
- @Modify<Quotation,Size +0>
- @Modify<Itemize,Spread 0.8>",
- Imprint10="@Use(AuxFile='vmsimp.aux')
- @Define<Q,FaceCode U>
- @Define(QQ,FaceCode U,AfterEntry=[@r<``>],BeforeExit=[@r<''>])
- @Define<SubH,Use Display,FaceCode B,Above 1.6,Below 1>
- @define<xx,use b,font bodyfont>
- @define<yy,use i,font bodyfont>
- @Modify<Insert,Spacing 1>
- @Modify<Verbatim,FaceCode U>
- @Modify<Example,FaceCode U,spacing 1.2>
- @Modify<Itemize,Spread 0.8>
- @Style<FontFamily SmallRoman12,Spacing 1.6,SingleSided>",
- Imagen300="@Use(AuxFile='vmsim3.aux')
- @Define<Q,FaceCode U>
- @Define(QQ,FaceCode U,AfterEntry=[@r<``>],BeforeExit=[@r<''>])
- @Define<SubH,Use Display,FaceCode B,Above 1.6,Below 1>
- @define<xx,use b,font bodyfont>
- @define<yy,use i,font bodyfont>
- @Modify<Insert,Spacing 1>
- @Modify<Verbatim,FaceCode U>
- @Modify<Example,FaceCode U,spacing 1.2>
- @Modify<Itemize,Spread 0.8>
- @Style<FontFamily SmallRoman12,Spacing 1.6,SingleSided>",
- X9700="@Use<AuxFile='ckx9.aux'>
- @Style<FontFamily Univers10, DoubleSided, Spacing 0.9, Spread 0.8>
- @Style<Scriptpush No>
- @define<xx,use b,font bodyfont>
- @define<yy,use i,font bodyfont>
- @Define<Q,FaceCode U>
- @Define(QQ,FaceCode U,AfterEntry=[@r<``>],BeforeExit=[@r<''>])
- @Define<SubH,Use Display,FaceCode B,Above 1.6,Below 1>
- @Modify<Description,Spacing 0.8,Spread 0.75>
- @Modify<Quotation,Spacing 0.8,Spread 0.75>
- @Modify<Enumerate,Spacing 0.8,Spread 0.75>
- @Modify(Verbatim,Spacing 0.8,Spread 0.75,FaceCode U)
- @Modify<Example,FaceCode U, Spacing 1.1>
- @Modify[Itemize, Numbered < @,- >, Spacing 0.8, Spread 0.5]"
- }
- @Comment(Set spacing and paging requirements for chapter & section headings)
-
- @Modify(Hdx,Above 2,Below 1,Need 8)
- @Modify(Hd0,Above 2,Below 1,Need 8)
- @Modify(Hd2,Above 2,Below 1,Need 8)
- @Modify(Hd3,Above 2,Below 1,Need 8)
- @Modify(Hd4,Above 2,Below 1,Need 8)
- @Modify<Heading, Above 2, Need 8>
- @Modify<Subheading, Above 1.5, Need 6>
-
- @Pageheading<>
- @Begin(TitlePage,Initialize "@BlankSpace(2.4inches)",sink 0)
- @MajorHeading(VAX/VMS KERMIT-32 USER GUIDE)
- @heading<Version 3.3.126>
-
-
- Christine M@. Gianone and Frank da Cruz
- Columbia University Center for Computing Activities
- New York, New York 10027
-
-
-
-
- @i<July, 1990>
-
-
-
- Copyright (C) 1981,1990
- Trustees of Columbia University in the City of New York
-
- @i<Permission is granted to any individual or institution to use, copy,
- or redistribute this document so long as it is not sold for profit, and
- provided this copyright notice is retained.>
- @case[device, x9700="@blankpage(1)"]
- @end<titlepage>
- @PageHeading(Odd,Immediate,
- Left="@xx<@Value[SectionNumber]. @Value[SectionTitle]>",
- Right="@yy<Page @ref(page)>",
- Line="@bar()@blankspace(2)")
- @PageHeading(Even,
- Left="@yy<Page @ref(page)>",
- Right="@xx<Kermit User Guide: @Title(Chapter) @Value[SectionNumber]>",
- Line="@bar()@blankspace(2)")
- @set(page=1)
- @Include<vmsmit>
- @PageHeading(Odd,Immediate,
- Left="@xx<VAX/VMS Kermit>",
- Right="@yy<Page @ref(page)>",
- Line="@bar()@blankspace(2)")
- @PageHeading(Even,
- Left="@yy<Page @ref(page)>",
- Right="@xx<Kermit User Guide>",
- Line="@bar()@blankspace(2)")
- @Case(Device,x9700="@Comment<Begin Duplex Kludge>
- @SendEnd(#Index `@begin<Transparent,PageBreak UntilOdd>@end<Transparent>')
- @Comment<End Duplex Kludge>")
-